﻿Imports System Imports System.Collections.Generic Imports System.Text

Public Class CLoaiSP
#Region "Thuộc tính"

    Private _maLSP As Integer
    Private _tenLSP As String
    Private _ghiChu As String
    Public Property maLSP() As Integer
        Get
            Return _maLSP
        End Get
        Set(ByVal value As Integer)
            _maLSP = value
        End Set
    End Property

    Public Property tenLSP() As String
        Get
            Return _tenLSP
        End Get
        Set(ByVal value As String)
            _tenLSP = value
        End Set
    End Property

    Public Property ghiChu() As String
        Get
            Return _ghiChu
        End Get
        Set(ByVal value As String)
            _ghiChu = value
        End Set
    End Property

#End Region
#Region "Phưong thức khởi tạo"
    Public Sub New()
        maLSP = 0
        tenLSP = ""
        ghiChu = ""
    End Sub

    Public Sub New(ByVal loaiSP As CLoaiSP)
        maLSP = loaiSP.maLSP
        tenLSP = loaiSP.tenLSP
        ghiChu = loaiSP.ghiChu
    End Sub

    Public Sub New(ByVal mLSP As Integer, ByVal tLSP As String, ByVal gChu As String)
        maLSP = mLSP
        tenLSP = tLSP
        ghiChu = gChu
    End Sub
#End Region
End Class

